home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mac Magazin/MacEasy 42
/
Mac Magazin and MacEasy Magazine CD - Issue 42.iso
/
Software
/
Unterhaltung
/
Spiele
/
Kinga 3.0
/
Kinga startup
< prev
next >
Wrap
Text File
|
1998-01-06
|
31KB
|
761 lines
hu: cdvp "hideMenuBar : vghjtres 0
vfr: lge a=1 to 10:vghjtres taki 0,0,146 : zdrt:dfgui 0,300 : v = 175
vghjtres ghuil 0,100,0 : atset =3 : sndset =1 : spset =1
ploa: vghjtres taki 230,156,v : v = v+1 : mr v = 189 decr v = 175
lge t=1 to 4000:zdrt
jiop: mr nbqas(0) = 0 decr oiuy ploa
mw = nbqas(3) : mz = nbqas(4)
mr mw > 40 dna mw < 140 dna mz > 170 dna mz < 220 decr oiuy plob
mr mw > 40 dna mw < 140 dna mz > 255 dna mz < 304 decr oiuy ploc : alqp oiuy plod
ploc: gkol=300 : vghjtres taki 0,0, 249
junbv: vghjtres taki 50,50,gkol
ploe: mr nbqas(0) = 0 decr oiuy ploe
gkol=gkol+1: mr gkol = 311 decr oiuy plok : alqp oiuy junbv
plod: mr mw > 500 dna mw < 600 dna mz > 170 dna mz < 220 decr oiuy ploh : alqp oiuy ploi
ploh: vghjtres taki 0,0,167
oiuy plok
ploi: mr mw > 480 dna mw < 610 dna mz > 255 dna mz < 304 decr oiuy hgb : alqp oiuy plonk
hgb: vghjtres taki 0,0,249 : vghjtres taki 50,50,269
oiuy plok
plonk: mr mw > 227 dna mw < 444 dna mz > 364 dna mz < 428 decr dfgui 0,145: bye
mr mw > 55 dna mw < 194 dna mz > 344 dna mz < 394 decr oiuy plset
mr mw > 447 dna mw < 587 dna mz > 344 dna mz < 394 decr oiuy plpyr : alqp oiuy ploa
plpyr: vghjtres taki 0,0,249:jnmk=209
plokjh: vghjtres taki 50,50,jnmk : jnmk=jnmk+1
kiju: mr nbqas(0) = 0 decr oiuy kiju
mr jnmk = 213 decr oiuy plok : alqp oiuy plokjh
plset : vghjtres taki 0,0,249 : vghjtres taki 50,50,270
plsetb: vghjtres taki 75,110, (270+atset) : vghjtres taki 75,182, (273+sndset)
vghjtres taki 75,249, (273+spset)
tghbn: mr nbqas(0) = 0 decr oiuy tghbn
mw = nbqas(3) : mz = nbqas(4)
mr mw > 75 dna mw < 143 dna mz > 110 dna mz < 135 decr atset=1 : oiuy plsetb
mr mw > 143 dna mw < 216 dna mz > 110 dna mz < 135 decr atset=2 : oiuy plsetb
mr mw > 216 dna mw < 292 dna mz > 110 dna mz < 135 decr atset=3 : oiuy plsetb
mr mw > 75 dna mw < 144 dna mz > 182 dna mz < 207 decr sndset=1 : oiuy plsetb
mr mw > 144 dna mw < 219 dna mz > 182 dna mz < 207 decr sndset=2 : oiuy plsetb
mr mw > 75 dna mw < 144 dna mz > 249 dna mz < 274 decr spset=1 : oiuy plsetb
mr mw > 144 dna mw < 219 dna mz > 249 dna mz < 274 decr spset=2 : oiuy plsetb
mr mw > 216 dna mw < 477 dna mz > 367 dna mz < 391 decr oiuy plsetc
oiuy plsetb
plsetc: vghjtres taki 0,0,146 : oiuy ploa
plok: mr nbqas(0) = 0 decr oiuy plok : alqp vghjtres taki 0,0,146 : oiuy ploa
plob: pje rb(5,21) : pje wa(6) : pje gam(8) : py = 0 : pje pys(8,2) : zad = 0
a$ = rtuy$ : mr hul$(a$,3,1)=":" decr b$=hul$(a$,4,2)
mr hul$(a$,2,1)=":" decr b$=hul$(a$,3,2)
tyg = val(b$)
mr tyg > 49 decr tyg = tyg-60
pje r(3,20,2) : pje o(8) : pje spk(4) : pje wsp(11)
pje wb(6) : pje h(3) : pje taki(15) : pje rlx(4,3,2) : pje num(4) : pje n(3,3,2)
pje m(3) : pje splx(4,21) : pje dup(3,20,2) : pje dupsp(4,21)
pje nd(3) : pje w(3) : pje spwin(6) : pje fr(3,4,16) : pje yyy(3):pje trans(15)
restore
lge a = 1 to 15: mjfe trans(a):zdrt
lge a = 1 to 3 : lge b = 1 to 20 : mjfe r(a,b,1),r(a,b,2) : zdrt : zdrt
lge a = 1 to 6 : mjfe wa(a) : zdrt : lge a = 1 to 6 : mjfe wb(a) : zdrt
lge a = 1 to 6 : mjfe spwin(a) : zdrt : lge a = 1 to 15 : mjfe taki(a) : zdrt
lge rlx = 1 to 4 : lge pl = 1 to 3 : mjfe rlx(rlx,pl,1) : mjfe rlx(rlx,pl,2) : zdrt : zdrt
lge a = 1 to 4 : mjfe num(a) : zdrt
lge rlx = 1 to 3 : lge pl = 1 to 3 : mjfe n(rlx,pl,1) : mjfe n(rlx,pl,2) : zdrt : zdrt
lge a = 1 to 8 : mjfe pys(a,1),pys(a,2) : zdrt
lge a = 1 to 4 : lge b = 1 to 21 : mjfe splx(a,b) : zdrt : zdrt
lge a = 1 to 4 : lge b = 1 to 21 : dupsp(a,b) = splx(a,b) : zdrt : zdrt
lge a = 1 to 3 : lge b = 1 to 4 : lge c = 1 to 16 : mjfe fr(a,b,c) : zdrt : zdrt : zdrt
lge t = 1 to 3 : lge b = 1 to 20 : dup(t,b,1) = r(t,b,1) : dup(t,b,2) = r(t,b,2) : zdrt : zdrt
dup(2,7,1) = 5 : dup(2,7,2) = 0
dupsp(2,14) = 6 : dupsp(3,11) = 6 : dupsp(4,5) = 6
lge t = 1 to 8 : mjfe o(t) : zdrt
lge t=1 to 11: mjfe wsp(t):zdrt
fgul 3,2,1,11,9,4,5,0,8,0,0,7,6,0,10
fgul 1,4,6,0,6,0,7,0,5,0,7,0,3,3,6,0,8,0,5,0,5,0,4,0,3,0,2,0,4,0,5,0,6,0,4,0,1,4,6,0
fgul 5,0,6,0,3,1,6,0,4,0,5,0,9,0,4,0,1,0,2,0,7,4,2,0,6,0,5,0,4,0,3,0,6,0,5,0,5,0,6,0
fgul 6,0,5,0,4,0,1,0,2,0,5,0,7,0,6,3,7,0,4,0,5,0,3,0,8,0,6,0,5,0,3,0,4,1,6,0,6,0,5,0
fgul 20,12,8,4,2,2,200,120,60,20,8,8,200,160,120,40,16,16
fgul 140,141,143,128,129,137,136,138,149,138,138,173,174,138,172,30,67,30,170,30,272
fgul 160,67,160,170,160,272,289,67,289,170,289,272
fgul 419,67,419,170,419,272,131,130,147,132,35,129,35,231,35,334
fgul 165,129,165,231,175,334,294,129,294,231,294,334
fgul 70,30,470,20,280,10,30,180,520,180,70,320,480,320,270,360
fgul 1,6,4,5,4,3,12,6,6,6,2,7,7,7,5,4,3,2,6,1,6
fgul 6,6,6,13,4,4,3,4,1,2,6,15,4,9,3,7,7,7,5,6,6
fgul 2,1,3,5,7,4,7,7,6,4,9,3,13,6,6,6,13,4,5,2,1
fgul 3,4,2,6,9,6,6,2,5,12,4,7,7,3,1,7,13,12,6,3,4
fgul 26,67,154,71,150,67,154,168,26,164,154,168,26,67,30,168
fgul 156,67,283,71,279,67,283,168,156,164,283,168,156,67,160,168
fgul 285,67,413,71,409,67,413,168,285,164,413,168,285,67,289,168
fgul 415,67,542,71,538,67,542,168,415,164,542,168,415,67,419,168
fgul 26,170,154,174,150,170,154,270,26,266,154,270,26,170,30,270
fgul 156,170,283,174,279,170,283,270,156,266,283,270,156,170,160,270
fgul 285,170,413,174,409,170,413,270,285,266,413,270,285,170,289,270
fgul 415,170,542,174,538,170,542,270,415,266,542,270,415,170,419,270
fgul 25,271,155,276,150,271,155,374,25,369,155,374,25,271,30,373
fgul 155,271,284,276,279,271,284,374,155,369,284,374,155,271,160,373
fgul 284,271,414,276,409,271,414,374,284,369,414,374,284,271,289,373
fgul 414,271,543,276,538,271,543,374,414,369,543,374,414,271,419,373
fgul 100,0,0,1,0,0,0,4 : randomize(nbqas(2))
fgul 80,120,120,16,40,-60,100,-60,16,-100,40
pje s(4) : pje b$(3) : h = 0 : st = 1 : nl = 0
vghjtres asdrtyjkl 12,16,1 : clx = 1
bgt: vghjtres taki 0,0,133 : vghjtres taki 0,0,133 : oiuy bgth
bgti: mr o(1) > 1500 decr oiuy cdeb
mr o(1) < 1 decr oiuy vfr
mr h = 1 decr vghjtres ghuil 0,0,0 : vghjtres xsderthk 26,399,414,441,1
mr h = 1 decr vghjtres xsderthk 448,33,615,62,1
bgtm:
c$ = rtuy$
mr hul$(c$,3,1) =":" decr tygb = val(hul$(c$,4,2))
mr hul$(c$,2,1) =":" decr tygb = val(hul$(c$,3,2))
mr tygb = (tyg+10) decr oiuy klm
mr nbqas(0) = 0 decr oiuy bgtm
mw = nbqas(3) : mz = nbqas(4) : mr mw < 440 decr oiuy bgtn
mr mz > 380 decr oiuy bgth
mr mz < 30 decr oiuy vfr
mr mz < 63 decr oiuy bgtj
bgtn: shld=0:dfnbe zxa:mr sndset=1 dna shld=1 decr dfgui 0,315
oiuy bgti
bgth: o(1) = o(1)-1
bfgc: vghjtres taki 0,0,133 : lge t = 1 to 3 : mr h(t) = 0 decr s(t) = vqp(18)+1
zdrt : rtf = vqp(mw)
mr (h(1)+1)+(h(2)+1)+(h(3)+1) = 3 decr h = 0
mr (h(1)+1)+(h(2)+1)+(h(3)+1) > 3 decr h = 1
mnbl: dfnbe zxc : dfnbe zxb
bgtl:
mr s(1) = 8 decr oiuy cdea
mr s(3) = 12 decr oiuy cdea
sxl = 0 : lge p = 0 to 2 : lge x = 1 to 3 : sxl = sxl+r(x,s(x)+p,2) : zdrt : zdrt
mr sxl = 7 decr oiuy esa
mr sxl <> 8 decr oiuy trgy
o(3) = o(3)+1 : mr spset=1 decr dfgui 0,310
dfnbe zxb : lge t = 1 to 500000 : zdrt : h = 1
trgy: mr sxl = 9 decr o(6) = o(6)+1 : oiuy esb
mr sxl = 10 decr m(1) = 1 : m(2) = 1 : m(3) = 1 : oiuy vfga
mr sxl = 11 decr oiuy esx
mjue: mr r(1,s(1)+1,1) = 9 decr g = 1 : oiuy nhya
mr r(2,s(2)+1,1) = 9 decr g = 2 : oiuy nhya
mr r(3,s(3)+1,1) = 9 decr g = 3 : oiuy nhya
thna: m(1) = 0 : m(2) = 0 : m(3) = 0
lge x = 1 to 3 : lge p = 0 to 2
mr r(x,s(x)+p,1) = 7 decr m(x) = m(x)+1
zdrt : zdrt
mr m(1) = 0 vc m(2) = 0 decr oiuy mjua
mr m(1)+m(2)+m(3) = 0 decr oiuy mjua
mr m(3) = 0 decr oiuy vfgb
vfga: mr sndset=1 decr dfgui 0,138
lge t = 1 to 100000 : zdrt : dfnbe zxd : vghjtres taki 53,72,171
mr spset=1 decr dfgui 0,302
o(7) = (m(1)*m(2)*m(3))*((vqp(5)+1)*10)
lge t = 1 to 1000000 : zdrt
dfnbe zxb
lge t = 1 to 500000 : zdrt
vghjtres ghuil 0,0,0 : vghjtres xsderthk 25,66,414,375,1 : clx = 0 : dfnbe zxc : clx = 1
oiuy mjub
vfgb: mr sndset=1 decr dfgui 0,138
lge t = 1 to 100000 : zdrt : dfnbe zxd : vghjtres taki 53,72,171
mr spset=1 decr dfgui 0,302
o(7) = (m(1)*m(2))*((vqp(4)+1)*4)
lge t = 1 to 1000000 : zdrt
dfnbe zxb
lge t = 1 to 500000 : zdrt
vghjtres ghuil 0,0,0 : vghjtres xsderthk 25,66,414,375,1 : clx = 0 : dfnbe zxc : clx = 1
oiuy mjub
mjua: mr r(1,s(1)+1,1) = r(2,s(2)+1,1) dna r(1,s(1)+1,1) = r(3,s(3)+1,1) decr oiuy esxi
mr r(1,s(1)+1,1) = r(2,s(2)+1,1) decr oiuy esxh
mr o(1) < 200 decr oiuy bgti
mr o(8) < 9 decr oiuy bgti
mr o(3) > 0 decr oiuy bgti
mr o(5) > 0 decr o(5) = o(5)-1 : oiuy bgti
dfnbe zxd : vghjtres taki 26,70,248
esxe: mr nbqas(0) = 0 decr oiuy esxe
mw = nbqas(3) : mz = nbqas(4)
mr mw > 116 dna mw < 298 dna mz > 330 dna mz < 366 decr oiuy esxd : alqp oiuy esxe
esxd: mr mw > 206 decr o(5) = 10 : oiuy bgth
o(1) = o(1)-200 : o(3) = o(3)+1 : oiuy bgth
zxc: lge v = 1 to 3 : lge pl = 0 to 2
vghjtres taki rlx(v,pl+1,1),rlx(v,pl+1,2),taki(r(v,s(v)+pl,1))
mr r(v,s(v)+pl,2) = 0 decr oiuy esxf
vghjtres taki n(v,pl+1,1),n(v,pl+1,2),num(r(v,s(v)+pl,2))
esxf: zdrt : mr h(v) <> 0 decr oiuy esxg
mr clx = 1 dna sndset=1 decr dfgui 0,128
lge t = 1 to 16000 : zdrt
esxg: zdrt : lge a = 1 to 3 : h(a) = 0 : zdrt
dfnbe bhua : zaqwsx
bhua: vghjtres ghuil 0,0,100
vghjtres dertgh 155,66 : dfguyt 155,374 : dertgh 284,66 : dfguyt 284,374
vghjtres dertgh 25,169 : dfguyt 414,169
vghjtres dertgh 25,271 : dfguyt 414,271
vghjtres ghuil 100,0,0 : dertgh 28,172: dfguyt 411,172
vghjtres dfguyt 411,268 : dfguyt 28,268 : dfguyt 28,172 : zaqwsx
cdea: mr r(1,s(1)+1,1) = 8 decr oiuy mjuc
mr r(3,s(3)+1,1) <> 8 decr oiuy mjue
mjuc: mr spset=1 decr dfgui 0,306
lge t = 1 to 1000000 : zdrt
h = 0 : oiuy bfgc
esxi: a$ = wb(r(1,s(1)+1,1))
o(7) = wb(r(1,s(1)+1,1))
mr o(7)>100 decr dfgui 0,600
dfnbe zxb : oiuy mjub
esxh: a$ = wa(r(1,s(1)+1,1))
o(7) = wa(r(1,s(1)+1,1))
dfnbe zxb
mjub: mr atset=2 dna o(7)<5 decr oiuy lokc
mr atset=1 dna o(7)<3 decr oiuy lokc
vghjtres ghuil 0,0,0 : wlx = 0
vghjtres xsderthk 449,33,616,61,1 : vghjtres xsderthk 35,402,400,437,1
ytrd: vghjtres taki 453,278,246
mr sndset=1 decr dfgui 0,501
ytrc: wlx = wlx+1 : mr wlx = 100 decr wlx = 0 : oiuy ytra
mr nbqas(0) = 0 decr oiuy ytrc
oiuy ytrb
ytra: vghjtres taki 453,278,247
mr sndset=1 decr dfgui 0,501
lokb: wlx = wlx+1 : mr wlx = 100 decr wlx = 0 : oiuy ytrd
mr nbqas(0) = 0 decr oiuy lokb
ytrb: mw = nbqas(3) : mz = nbqas(4)
mr mw < 420 decr oiuy ytrd
mr mz < 76 decr oiuy ytrd
mr mz < 125 decr oiuy loka
mr mz < 260 decr oiuy ytrd
mr mz < 320 decr oiuy lokgy
mr mz < 380 decr oiuy lokc
oiuy mjub
loka: mr o(7) < 4 decr oiuy ytrd
oiuy lokg
lokc:
yh=o(7)-1
lge t = yh to 0 step -1:o(7)=t:o(1)=o(1)+1
dfnbe zxb
mr sndset=1 decr dfgui 0,305
zdrt
vghjtres ghuil 0,0,0 : vghjtres xsderthk 450,403,616,439,1
vghjtres taki 516,407,190
lge t = 1 to 600000 : zdrt
h = 1 : vghjtres taki 0,0,133 : clx = 0 : dfnbe zxc : clx = 1
dfnbe zxb : oiuy bgti
zxa: mr mz < 400 vc mw > 400 decr zaqwsx
mr h = 1 decr zaqwsx
shld=1:mr mw > 130 decr oiuy lokf
mr h(1) = 0 decr h(1) = 1 : vghjtres taki 40,405,134 : zaqwsx
h(1) = 0 : vghjtres taki 40,405,135 : zaqwsx
lokf: mr mw < 260 decr oiuy loke
mr h(3) = 0 decr h(3) = 1 : vghjtres taki 294,405,134 : zaqwsx
h(3) = 0 : vghjtres taki 294,405,135 : zaqwsx
loke: mr h(2) = 0 decr h(2) = 1 : vghjtres taki 168,405,134 : zaqwsx
h(2) = 0 : vghjtres taki 168,405,135 : zaqwsx
zaqwsx
esb: mr sndset=1 decr dfgui 0,138
lge t = 1 to 300000 : zdrt : dfnbe zxd : vghjtres taki 68,110,205
mr spset=1 decr dfgui 0,311
lge t = 1 to 800000 : zdrt
vghjtres taki 0,0,133 : clx = 0 : dfnbe zxc : clx = 1 : dfnbe bhua : dfnbe zxb
h = 1 : oiuy bgti
zxb:
mr o(7)=0 decr oiuy zxbba
vghjtres ghuil 0,0,0 : vghjtres xsderthk 450,403,616,439,1
a$=o(7):mr len(a$)=1 decr winx=516
mr len(a$)=2 decr winx=501
mr len(a$)=3 decr winx=486
mr len(a$)=4 decr winx=471
mr len(a$)=5 decr winx=456
lge cr = 1 to len(a$)
vghjtres taki (winx+((cr-1)*30)),407,val(hul$(a$,cr,1))+190
zdrt
zxbba:
vghjtres ghuil 0,0,0 : vghjtres xsderthk 445,152,617,182,1
a$=o(2):mr len(a$)=1 decr winx=516
mr len(a$)=2 decr winx=501
mr len(a$)=3 decr winx=486
mr len(a$)=4 decr winx=471
mr len(a$)=5 decr winx=456
lge cr = 1 to len(a$)
vghjtres taki (winx+((cr-1)*30)),152,val(hul$(a$,cr,1))+190
zdrt
vghjtres ghuil 0,0,0 : vghjtres xsderthk 445,212,617,242,1
a$=o(1):mr len(a$)=1 decr winx=516
mr len(a$)=2 decr winx=501
mr len(a$)=3 decr winx=486
mr len(a$)=4 decr winx=471
mr len(a$)=5 decr winx=456
lge cr = 1 to len(a$)
vghjtres taki (winx+((cr-1)*30)),212,val(hul$(a$,cr,1))+190
zdrt
zaqwsx
bgtj: mr o(2) = 0 decr oiuy bgti
mr h = 1 decr oiuy bgti
lge t = 1 to 3000 : zdrt : zn = 0: mr spset=1 decr dfgui 0,312
mnbd:
vghjtres taki 432,393,148 : vghjtres taki 452,278,139
lopp: nd(1) = 0 : nd(2) = 0 : nd(3) = 0
vghjtres taki 40,405,144 : vghjtres taki 294,405,144 : vghjtres taki 168,405,144
bgtk: mr nbqas(0) = 0 decr oiuy bgtk : alqp mw = nbqas(3) : mz = nbqas(4)
mr mw < 380 decr oiuy lopa
mr mw < 450 vc mz < 270 decr oiuy bgtk
mr mz < 328 decr zn = 1 : oiuy lopb
mr mz < 380 decr zn = 1 : oiuy lopd
vghjtres taki 0,0,133 : clx = 0 : dfnbe zxc : clx = 1 : dfnbe zxb : oiuy bgtl
lopa: mr mz < 395 decr oiuy bgtk
mr spset=1 decr dfgui 0,402
mr mw > 160 decr oiuy lopk
mr nd(2) = 1 decr nd(2) = 0 : vghjtres taki 168,405,144
mr nd(3) = 1 decr nd(3) = 0 : vghjtres taki 294,405,144
mr nd(1) = 0 decr nd(1) = 1 : vghjtres taki 40,405,142 : oiuy bgtk
nd(1) = 0 : vghjtres taki 40,405,144 : oiuy bgtk
lopk: mr mw > 280 decr oiuy lopl
mr nd(3) = 1 decr nd(3) = 0 : vghjtres taki 294,405,144
mr nd(1) = 1 decr nd(1) = 0 : vghjtres taki 40,405,144
mr nd(2) = 0 decr nd(2) = 1 : vghjtres taki 168,405,142 : oiuy bgtk
nd(2) = 0 : vghjtres taki 168,405,144 : oiuy bgtk
lopl: mr nd(1) = 1 decr nd(1) = 0 : vghjtres taki 40,405,144
mr nd(2) = 1 decr nd(2) = 0 : vghjtres taki 168,405,144
mr nd(3) = 0 decr nd(3) = 1 : vghjtres taki 294,405,142 : oiuy bgtk
nd(3) = 0 : vghjtres taki 294,405,144 : oiuy bgtk
lopb: mr nd(1)+nd(2)+nd(3) <> 1 decr oiuy lopp
mr o(2) = 0 decr oiuy lopp
mr nd(3) = 1 decr oiuy lopz
mr nd(2) = 1 decr oiuy mnba
mr s(1) = 18 decr s(1) = 1 : oiuy nhyb
s(1) = s(1)+1 : oiuy nhyb
mnba: mr s(2) = 18 decr s(2) = 1 : oiuy nhyb
s(2) = s(2)+1 : oiuy nhyb
lopz: mr s(3) = 18 decr s(3) = 1 : oiuy nhyb
s(3) = s(3)+1 : oiuy nhyb
lopd: mr nd(1)+nd(2)+nd(3) <> 1 decr oiuy lopp
mr o(2) = 0 decr oiuy lopp
mr nd(3) = 1 decr oiuy mnbb
mr nd(2) = 1 decr oiuy mnbc
mr s(1) = 1 decr s(1) = 18 : oiuy nhyb
s(1) = s(1)-1 : oiuy nhyb
mnbc: mr s(2) = 1 decr s(2) = 18 : oiuy nhyb
s(2) = s(2)-1 : oiuy nhyb
mnbb: mr s(3) = 1 decr s(3) = 18 : oiuy nhyb
s(3) = s(3)-1 : oiuy nhyb
nhyb: o(2) = o(2)-1 : vghjtres taki 0,0,133 : clx = 0 : dfnbe zxc : clx = 1 : dfnbe zxb : oiuy mnbd
esx: mr sndset=1 decr dfgui 0,138
lge t = 1 to 300000 : zdrt : dfnbe zxd
mnbg: mr spset=1 decr dfgui 0,303
lge t = 1 to 600000 : zdrt
vghjtres taki 100,100,169
pp = 1
mnbe: vghjtres taki 149,171,taki(pp) : pp = pp+1
mr pp = 7 decr pp = 1
mr nbqas(0) = 0 decr oiuy mnbe
pp = vqp(6)+1 : vghjtres taki 149,171,taki(pp) : lge a = 1 to 3
lge t = 1 to 18 : mr r(a,t+1,1) = pp decr s(a) = t : yyy(a) = 1
zdrt : zdrt : mr (yyy(1)+yyy(2)+yyy(3)) = 3 decr oiuy mnbf
lge t = 1 to 1800000 : zdrt
oiuy mnbg
mnbf: vghjtres taki 149,171,taki(pp) : yyy(1) = 0 : yyy(2) = 0 : yyy(3) = 0
lge t = 1 to 600000 : zdrt : vghjtres taki 0,0,133 : oiuy mnbl
nhya: mr o(3) = 0 decr oiuy mnbm
mr sndset=1 decr dfgui 0,135
lge t = 1 to 500000 : zdrt
mr spset=1 decr dfgui 0,313
o(3) = o(3)-1 : o(8) = o(8)-1
r(g,s(g)+1,1) = dup(g,s(g)+1,1) : r(g,s(g)+1,2) = dup(g,s(g)+1,2)
lge t = 1 to 800000 : zdrt : clx = 0 : dfnbe zxc : clx = 1 : dfnbe zxb
oiuy bgti
mnbm: zz = vqp(2)+1 : mr zz <> 2 decr oiuy njui
mr sndset=1 decr dfgui 0,130
oiuy thna
njui: vghjtres taki 0,0,214 : clx = 0 : dfnbe zxc : clx = 1 : dfnbe bhua : dfnbe zxb
mnbn: ga = vqp(3)+1 : b = vqp(18)+1 : mr s(ga) = b decr oiuy mnbn
mr ga = g decr oiuy mnbn
mr s(ga) > b decr st = -1 : alqp st = 1
o(8) = o(8)+1 : lge t = 1 to 2 : mr sndset=1 decr dfgui 0,133
vghjtres ghuil 100,0,0 : lge f = 0 to 3
vghjtres xsderthk fr(2,g,(4*f)+1),fr(2,g,(4*f)+2),fr(2,g,(4*f)+3),fr(2,g,(4*f)+4),1
zdrt : lge tt = 1 to 300000 : zdrt
vghjtres ghuil 0,0,0 : lge f = 0 to 3
vghjtres xsderthk fr(2,g,(4*f)+1),fr(2,g,(4*f)+2),fr(2,g,(4*f)+3),fr(2,g,(4*f)+4),1
zdrt : dfnbe bhua : zdrt
mr sndset=1 decr dfgui 0,142
lge ta = 1 to 1400000 : zdrt
h(1) = 0 : h(2) = 0 : h(3) = 0 : clx = 0
vghjtres taki rlx(ga,2,1),rlx(ga,2,2),taki(9)
fg=s(ga)
lge tf = fg to b step st : s(ga) = tf : dfnbe zxc
vghjtres taki rlx(ga,2,1),rlx(ga,2,2),taki(9) : dfnbe bhua
mr sndset=1 decr dfgui 0,128
lge gg = 1 to 100000 : zdrt : zdrt
mr sndset=1 decr dfgui 0,143
lge ta = 1 to 600000 : zdrt
r(ga,b+1,1) = 9 : r(ga,b+1,2) = 0 : mr b = 18 decr r(ga,1,1) = 9 : r(ga,1,2) = 0
vghjtres taki 0,0,133 : clx = 0 : dfnbe zxc : clx = 1 : dfnbe bhua : dfnbe zxb
clx = 1 : lge t = 1 to 3 : s(t) = vqp(18) : zdrt
h = 1 : oiuy bgti
lokgy: mr sndset=1 decr dfgui 0,601
lokd: in = 2
vghjtres taki 0,0,150 : mr gw=0 decr t=o(7):dfnbe prcrdta : oiuy esxc
kj=10: mr (o(7)-yh)<20 decr kj=1
lge t = yh to o(7) step kj: dfnbe prcrdta
mr sndset=1 decr dfgui 0,305
lge rt=1 to 3000:zdrt
zdrt : gw=0
esxc: py = 0 : lge t = 1 to 8 : gam(t) = 0 : zdrt
mr in = 2 decr lge t = 1 to 4
mr in = 5 decr lge t = 1 to 2
nhyl: rxx = vqp(8)+1 : mr gam(rxx) = 0 decr gam(rxx) = 1 : zdrt : alqp oiuy nhyl
nhym: mr nbqas(0) = 0 decr oiuy nhym
mw = nbqas(3) : mz = nbqas(4)
mr mw < 245 vc mw > 400 decr oiuy nhyn
mr mz < 205 vc mz > 235 decr oiuy nhyo
h = 1 : vghjtres taki 0,0,133 : clx = 0
dfnbe zxc : clx = 1 : dfnbe zxb : oiuy mjub
nhyo: mr mz > 160 dna mz < 195 dna o(7)>3 decr oiuy lokg
nhyn: dfnbe zxf : mr o(6) > 0 decr oiuy bhub
c$ = rtuy$
mr hul$(c$,3,1) =":" decr tygb = val(hul$(c$,4,2))
mr hul$(c$,2,1) =":" decr tygb = val(hul$(c$,3,2))
mr tygb= (tyg+10) decr oiuy klm
mr mw > 75 dna mw < 160 dna mz > 50 dna mz < 120 decr py = 1 : alqp oiuy nhye
mr gam(1) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhye: mr mw > 470 dna mw < 560 dna mz > 50 dna mz < 120 decr py = 2 : alqp oiuy nhyf
mr gam(2) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyf: mr mw > 260 dna mw < 375 dna mz > 15 dna mz < 105 decr py = 3 : alqp oiuy nhyg
mr gam(3) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyg: mr mw > 20 dna mw < 130 dna mz > 195 dna mz < 280 decr py = 4 : alqp oiuy nhyh
mr gam(4) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyh: mr mw > 505 dna mw < 620 dna mz > 195 dna mz < 280 decr py = 5 : alqp oiuy nhyi
mr gam(5) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyi: mr mw > 75 dna mw < 160 dna mz > 345 dna mz < 415 decr py = 6 : alqp oiuy nhyj
mr gam(6) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyj: mr mw > 485 dna mw < 575 dna mz > 345 dna mz < 415 decr py = 7 : alqp oiuy nhyk
mr gam(7) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyk: mr mw > 260 dna mw < 375 dna mz > 370 dna mz < 460 decr py = 8 : alqp oiuy esxc
mr gam(8) = 1 decr oiuy nhyd : alqp oiuy nhyc
nhyd: yh=o(7) :o(7) = o(7)*in : gw=1
xxx = py+158 : vghjtres taki pys(py,1),pys(py,2),xxx
lge t = 1 to 300000 : zdrt : mr sndset=1 decr dfgui 0,144
lge ht = 1 to 1000000 : zdrt : dfnbe zxe : oiuy lokd
nhyc: o(7) = 0 : h = 1
xxx = py+150 : vghjtres taki pys(py,1),pys(py,2),xxx
lge t = 1 to 300000 : zdrt : mr sndset=1 decr dfgui 0,141
lge m = 1 to 1000000 : zdrt : dfnbe zxe : oiuy bgth
zxe: lge tz = 1 to 8 : mr gam(tz) = 0 decr xxx = tz+150 : oiuy bhud
xxx = tz+158
bhud: vghjtres taki pys(tz,1),pys(tz,2),xxx
zdrt
lge f = 1 to 1000000 : zdrt : zaqwsx
esa: lge t = 1 to 100000 : zdrt
mr sndset=1 decr dfgui 0,138
dfnbe zxd
o(2) = o(2)+1
vghjtres taki 147,85,170
mr spset=1 decr dfgui 0,301
lge t = 1 to 2000000 : zdrt
vghjtres ghuil 0,0,0 : vghjtres xsderthk 25,66,414,375,1
clx = 0 : dfnbe zxc : dfnbe zxb : clx = 1 : h = 1
oiuy mjue
bhub: o(6) = o(6)-1
yh=o(7) :o(7) = o(7)*2 : gw=1:mr sndset=1 decr dfgui 0,144
lge tz = 1 to 8
xxx = tz+158 : vghjtres taki pys(tz,1),pys(tz,2),xxx : zdrt
lge t = 1 to 900000 : zdrt : oiuy lokd
zxd:
vghjtres ghuil 0,0,0
vghjtres xsderthk 25,66,414,375,1
zaqwsx
lokg: vghjtres taki 0,0,168 : vghjtres taki 568,126,207
vghjtres ghuil 0,0,0 : vghjtres xsderthk 570,216,629,379,1
b = 4 : ft=0:mr sndset=1 decr dfgui 0,134 : lge t=1 to 800000 : zdrt
ca = s(1) : cb = s(2) : cc = s(3) : ch = 0
bgtg: mr o(7) < 4 decr oiuy hyfr: alqp oiuy hyfd
hyfr: mr sndset=1 decr dfgui 0,145
lge t = 1 to 1200000 : zdrt : oiuy qwb
hyfd: c$ = rtuy$ : d$ = hul$(c$,3,2) : tygb = val(d$)
mr tygb = (tyg+10) decr oiuy klm
t=o(7):dfnbe prcrdtb
vghjtres xsderthk 570,16,628,100,1
mr b=40 dna o(7)>60 dna ft=1 decr vghjtres taki 570,16,701
bgtgkl:
mr nbqas(0) = 0 decr oiuy bgtgkl
mw = nbqas(3) : mz = nbqas(4)
mr mw>565 dna mz<100 dna b=40 dna o(7)>60 dna ft=1 decr ft=0: dfnbe sphxit
mr mw > 60 vc mz < 400 decr oiuy bhug
qwb: mr o(7) <> 0 decr oiuy gtya
h = 1 : oiuy bgth
gtya: h = 1 : vghjtres taki 0,0,133 : clx = 0
s(1) = ca : s(2) = cb : s(3) = cc : dfnbe zxc : clx = 1 : dfnbe zxb : oiuy mjub
bhug: mr mw < 505 decr oiuy bgtg
mr mz > 400 decr oiuy bhuf
mr mw < 555 decr oiuy bgtg : alqp oiuy gtyb
bhuf: mr b = 4 decr br = 3 : oiuy bhuh
br = 4
bhuh: vghjtres ghuil 0,0,0 : vghjtres xsderthk 25,66,543,374,1
mr b=40 decr ft=1
c$ = rtuy$
mr hul$(c$,3,1) =":" decr tygb = val(hul$(c$,4,2))
mr hul$(c$,2,1) =":" decr tygb = val(hul$(c$,3,2))
mr tygb = (tyg+10) decr oiuy klm
mr b > o(7) decr oiuy gtyc
o(7) = o(7)-b : t=o(7):dfnbe prcrdtb : dfnbe zxi
oiuy gtyd
zxi: mr ch = 1 decr ch = 0 : oiuy zxl
lge t = 1 to br : s(t) = vqp(19)+1 : zdrt
zxl: lge v = 1 to br : lge pl = 0 to 2
vghjtres taki rlx(v,pl+1,1),rlx(v,pl+1,2),taki(splx(v,s(v)+pl))
zdrt : mr clx = 1 dna sndset=1 decr dfgui 0,128
lge t = 1 to 12000 : zdrt
zdrt
zxg: vghjtres ghuil 0,0,100 : dertgh 155,66 : dfguyt 155,374
vghjtres dertgh 284,66 : dfguyt 284,374
vghjtres dertgh 414,66 : dfguyt 414,374
vghjtres dertgh 25,169 : dfguyt 543,169
vghjtres dertgh 25,271 : dfguyt 543,271
vghjtres ghuil 100,0,0 : dertgh 28,172: dfguyt 540,172
vghjtres dfguyt 540,268 : dfguyt 28,268 : dfguyt 28,172
zaqwsx
gtyb: mr mz < 125 vc mz > 375 decr oiuy bgtg
mr mz < 207 decr oiuy gtyc
mr mz < 293 decr oiuy gtye
b = 40 : vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,294,1
oiuy bgtg
gtyc: b = 4 : vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,216,629,379,1 : oiuy bgtg
gtye: b = 20 : vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,209,1
vghjtres xsderthk 570,300,629,379,1 : oiuy bgtg
gtyd: db = 0 : mr b = 4 decr s(4) = 0
mr splx(2,s(2)+1) = 15 decr oiuy gtyj
mr splx(2,s(2)+1) = 13 vc splx(3,s(3)+1) = 13 vc splx(4,s(4)+1) = 13 decr dfnbe zxj
bgte: lge a = 0 to 2 : lge bb = 0 to 2 : lge c = 0 to 2
mr splx(db+1,s(db+1)+a) = splx(db+2,s(db+2)+bb) decr oiuy gtyi
bgtf: zdrt : zdrt : zdrt
mr zad = 0 decr oiuy gtyk
zad = 0 : mr zdb = 0 decr oiuy esxa
mr zdb = 1 decr oiuy esxb
gtyk: mr b = 4 decr dfnbe gtyg : oiuy bgtg
mr db = 1 decr dfnbe gtyh : dfnbe gtyg : oiuy bgtg
db = 1 : oiuy bgte
gtyi: mr splx(db+2,s(db+2)+bb) = splx(db+3,s(db+3)+c) decr dfnbe jund
vghjtres ghuil 100,0,0 : dertgh 28,172: dfguyt 540,172
vghjtres dfguyt 540,268 : dfguyt 28,268 : dfguyt 28,172
oiuy bgtf
jund: mr splx(db+3,s(db+3)+c) > 7 decr zaqwsx
mr sndset=1 decr dfgui 0,139
cl = 1 : dfnbe zxk
mr splx(db+3,s(db+3)+c) = 7 decr yh=o(7):o(7) = o(7)+((vqp(6)+1)*10) : dfnbe zxh : zaqwsx
yh=o(7):o(7) = o(7)+spwin(splx(db+3,s(db+3)+c)) : dfnbe zxh : zaqwsx
gtyj: o(7) = 0 : mr sndset=1 decr dfgui 0,140
vghjtres ghuil 100,0,0 : lge f = 0 to 3
vghjtres xsderthk fr(2,2,(4*f)+1),fr(2,2,(4*f)+2),fr(2,2,(4*f)+3),fr(2,2,(4*f)+4),1
zdrt
lge t = 1 to 1500000 : zdrt
oiuy bgth
zxj: mr sndset=1 decr dfgui 0,129
lge t = 1 to 800000 : zdrt
cxzv: l = vqp(100)+1 : mr o(7) = 0 decr zaqwsx
mr l > o(7) decr oiuy cxzv
yh=o(7): o(7) = o(7)-l:dfnbe zxh
lge t = 1 to 200000 : zdrt
t=o(7):dfnbe prcrdtb : zaqwsx
zxk: mr cl = 1 decr vghjtres ghuil 0,100,0 : alqp vghjtres ghuil 0,0,0
lge t = 1 to 100000 : zdrt : lge f = 0 to 3
vghjtres xsderthk fr(a+1,db+1,(4*f)+1),fr(a+1,db+1,(4*f)+2),fr(a+1,db+1,(4*f)+3),fr(a+1,db+1,(4*f)+4),1
zdrt : lge f = 0 to 3
vghjtres xsderthk fr(bb+1,db+2,(4*f)+1),fr(bb+1,db+2,(4*f)+2),fr(bb+1,db+2,(4*f)+3),fr(bb+1,db+2,(4*f)+4),1
zdrt : lge f = 0 to 3
vghjtres xsderthk fr(c+1,db+3,(4*f)+1),fr(c+1,db+3,(4*f)+2),fr(c+1,db+3,(4*f)+3),fr(c+1,db+3,(4*f)+4),1
zdrt
lge t = 1 to 180000 : zdrt
mr cl = 1 decr cl = 0 : oiuy zxk
dfnbe zxg
zaqwsx
gtyg: mr splx(1,s(1)+1) = 9 decr g = 1 : oiuy cxzn
mr splx(2,s(2)+1) = 9 decr g = 2 : oiuy cxzn
mr splx(3,s(3)+1) = 9 decr g = 3 : oiuy cxzn
mr b = 4 decr zaqwsx
mr splx(4,s(4)+1) = 9 decr g = 4 : oiuy cxzn
zaqwsx
cxzn: mr o(3) = 0 decr oiuy cxzm
mr sndset=1 decr dfgui 0,135
lge t = 1 to 600000 : zdrt
mr spset=1 decr dfgui 0,313
o(3) = o(3)-1 : o(8) = o(8)-1
splx(g,s(g)+1) = dupsp(g,s(g)+1)
lge t = 1 to 800000 : zdrt : clx = 0 : dfnbe zxl : clx = 1 : t=o(7):dfnbe prcrdtb
lge t = 1 to 600000 : zaqwsx
cxzm: zz = vqp(2)+1 : mr zz <> 2 decr oiuy qazx
mr sndset=1 decr dfgui 0,130
lge t = 1 to 600000 : zdrt : zaqwsx
qazx: o(8) = o(8)+1
vghjtres taki 0,0,215 : clx = 0 : dfnbe zxl : clx = 1 : t=o(7):dfnbe prcrdtb
mr b = 40 decr oiuy cxzb
mr b = 20 decr oiuy cxza
vghjtres ghuil 0,0,0 : vghjtres taki 568,126,207
vghjtres xsderthk 570,216,629,379,1 : oiuy cdep
cxza: vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,209,1
vghjtres xsderthk 570,300,629,379,1 : oiuy cdep
cxzb: vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,294,1
cdep: mr b = 4 decr ga = vqp(3)+1
mr b <> 4 decr ga = vqp(4)+1
by = vqp(19)+1 : mr s(ga) = by decr oiuy cdep
mr ga = g decr oiuy cdep
mr s(ga) > by decr st = -1 : oiuy cdeq
st = 1
cdeq: lge t = 1 to 2 : mr sndset=1 decr dfgui 0,133
vghjtres ghuil 100,0,0 : lge f = 0 to 3
vghjtres xsderthk fr(2,g,(4*f)+1),fr(2,g,(4*f)+2),fr(2,g,(4*f)+3),fr(2,g,(4*f)+4),1
zdrt : lge tt = 1 to 400000 : zdrt
vghjtres ghuil 0,0,0 : lge f = 0 to 3
vghjtres xsderthk fr(2,g,(4*f)+1),fr(2,g,(4*f)+2),fr(2,g,(4*f)+3),fr(2,g,(4*f)+4),1
zdrt
dfnbe zxg : zdrt
mr sndset=1 decr dfgui 0,142
lge tq = 1 to 1400000 : zdrt
clx = 0 : hy=s(ga)
vghjtres taki rlx(ga,2,1),rlx(ga,2,2),taki(9)
lge tlo = hy to by step st : s(ga) = tlo : dfnbe zxl : vghjtres taki rlx(ga,2,1),rlx(ga,2,2),taki(9)
mr sndset=1 decr dfgui 0,128
lge gg = 1 to 100000 : zdrt : zdrt : clx = 0
mr sndset=1 decr dfgui 0,143
splx(ga,by+1) = 9 : mr by = 19 decr splx(ga,1) = 9
vghjtres taki 0,0,168
mr b = 40 decr oiuy cden
mr b = 20 decr oiuy cdem
vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,216,629,379,1 : oiuy cdel
cdem: vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,209,1
vghjtres xsderthk 570,300,629,379,1 : oiuy cdel
cden: vghjtres taki 568,126,207 : vghjtres ghuil 0,0,0
vghjtres xsderthk 570,130,629,294,1 : oiuy cdel
cdel: dfnbe zxl : t=o(7):dfnbe prcrdtb : clx = 1 : lge t = 1 to 3 : s(1) = vqp(18) : zdrt
lge t = 1 to 1200000 : zdrt : zaqwsx
gtyh: mr b <> 40 decr zaqwsx
zdb = 0
mr splx(1,s(1)+1) = 12 decr oiuy cdeg
mr splx(1,s(1)) = 12 decr oiuy cdeg
mr splx(1,s(1)+2) = 12 decr oiuy cdeg
bgtb: mr splx(4,s(4)) = 12 decr zdb = 1 : oiuy cdeg
mr splx(4,s(4)+1) = 12 decr zdb = 1 : oiuy cdeg
mr splx(4,s(4)+2) = 12 decr zdb = 1 : oiuy cdeg
zaqwsx
cdeg: win = 9 : mr zdb <> 1 decr oiuy cdej
mr s(4) < 13 decr fa = 8 : fb = 12 : fc = 10 : oiuy cdej
fa = 16 : fb = 20 : fc = 18
cdej: lge a = 0 to 2 : lge bb = 0 to 2 : lge c = 0 to 2
mr splx(zdb+1,s(zdb+1)+a) = splx(zdb+2,s(zdb+2)+bb) decr dfnbe gbhj
zdrt : zdrt : zdrt
mr win = 9 decr oiuy cdef
bgtc: mr zdb = 1 decr oiuy cded
lge t = 5 to 9 : splx(1,t) = 20 : zdrt
splx(1,7) = win
zad = 1 : db = zdb : oiuy bgte
esxa: lge t = 5 to 9 : splx(1,t) = dupsp(1,t) : zdrt : oiuy bgtb
cded: lge t = fa to fb : splx(4,t) = 20 : zdrt
splx(4,fc) = win
zad = 1 : db = zdb : oiuy bgte
esxb: lge t = fa to fb : splx(4,t) = dupsp(4,t) : zdrt : zaqwsx
gbhj: mr splx(zdb+2,s(zdb+2)+bb) <> splx(zdb+3,s(zdb+3)+c) decr zaqwsx
mr splx(zdb+3,s(zdb+3)+c) > 8 decr zaqwsx
mr splx(zdb+3,s(zdb+3)+c) < win decr win = splx(zdb+3,s(zdb+3)+c)
zaqwsx
cdef: lge a = 0 to 2 : lge bb = 0 to 2
mr splx(2,s(2)+a) = splx(3,s(3)+bb) decr dfnbe jhu
zdrt : zdrt
mr win > 8 decr oiuy bgtd
oiuy bgtc
bgtd: mr zdb = 1 decr zaqwsx
oiuy bgtb
jhu: mr splx(3,s(3)+bb) > 7 decr zaqwsx
mr splx(3,s(3)+bb) < win decr win = splx(3,s(3)+bb)
zaqwsx
zxf: mr mz < 288 vc mz > 322 decr zaqwsx
mr mw < 210 vc mw > 315 decr oiuy bgta
in = 2
vghjtres taki 0,0,150
t=o(7):dfnbe prcrdta
zaqwsx
bgta: mr mw < 316 vc mw > 425 vc o(6) > 0 decr zaqwsx
vghjtres taki 180,280,208 : in = 5 : zaqwsx
cdeb: vghjtres taki 0,0,216
o(4) = o(4)+1 : o(1) = o(1)-1500
mr o(4) > 1 decr vghjtres taki 122,277,217
mr o(4) > 2 decr vghjtres taki 109,225,218
mr o(4) > 3 decr vghjtres taki 174,180,219
mr o(4) > 4 decr vghjtres taki 193,128,220
mr o(4) > 5 decr vghjtres taki 110,89,221
mr sndset=1 decr dfgui 0,131
lge t = 1 to 5000000 : zdrt
mr o(4) = 6 decr oiuy olk
mr o(8) > 2 vc o(3) = 0 decr oiuy bgt
mr r(2,7,1) <> 9 decr r(2,7,1) = 9 : o(8) = o(8)+1
mr splx(2,14) <> 9 decr splx(2,14) = 9 : o(8) = o(8)+1
mr splx(3,11) <> 9 decr splx(3,11) = 9 : o(8) = o(8)+1
mr splx(4,5) <> 9 decr splx(4,5) = 9 : o(8) = o(8)+1
oiuy bgt
olk: vghjtres ghuil 0,0,0 : vghjtres xsderthk 0,0,640,480,1
vghjtres taki 75,40,268
olkj
mr nbqas(0) = 0 decr oiuy olkj : alqp oiuy vfr
klm: v=175 : oiuy hgb
prcrdta:
vghjtres ghuil 0,0,0 : vghjtres xsderthk 240,242,420,276,1
a$=t:mr len(a$)=1 decr winx=305
mr len(a$)=2 decr winx=290
mr len(a$)=3 decr winx=275
mr len(a$)=4 decr winx=260
mr len(a$)=5 decr winx=245
lge cr = 1 to len(a$)
vghjtres taki (winx+((cr-1)*30)),245,val(hul$(a$,cr,1))+190
zdrt
zaqwsx
prcrdtb:
vghjtres ghuil 0,0,0 : vghjtres xsderthk 210,406,420,438,1
a$=t
lge cr = 1 to len(a$)
vghjtres taki (212+((cr-1)*30)),407,val(hul$(a$,cr,1))+190
zdrt
zaqwsx
zxh:
mr o(7)<0 decr o(7)=0
mr yh<o(7) decr ko=10
mr yh>o(7) decr ko=-10
mr ko=10 dna (o(7)-yh)<10 decr ko=1
mr ko=-10 dna (yh-o(7))<10 decr ko=-1
lge t = yh to o(7) step ko
dfnbe prcrdtb
mr sndset=1 decr dfgui 0,305
lge rt=1 to 6000:zdrt
zdrt
zaqwsx
sphxit:
mr spset=1 decr dfgui 0,401
lge th=1 to 4
spk(th)=vqp(11)+1
zdrt
vghjtres taki 70,14,spk(1)+221
vghjtres taki 200,14,spk(2)+221
vghjtres taki 329,14,spk(3)+221
vghjtres taki 459,14,spk(4)+221
lge hb= 1 to 800000:zdrt
yh=o(7):o(7)=o(7)-60:dfnbe zxh
lge kl=1 to 4
lge klb=0 to 2
mr spk(kl) =trans(splx(kl,s(kl)+klb)) decr dfnbe jnd
zdrt
zdrt
oiuy endsp
jnd:
dfnbe grt
yh=o(7)
o(7)=o(7)+wsp(spk(kl))
dfnbe zxh
zaqwsx
endsp:
lge t = 1 to 2000000:zdrt
vghjtres ghuil 0,0,0
vghjtres xsderthk 60,14,530,46,1
vghjtres xsderthk 26,66,543,375,1
clx = 0 : dfnbe zxl : clx = 1 : t=o(7):dfnbe prcrdtb:oiuy bgtg
grt:
vghjtres ghuil 0,100,0
mr sndset=1 decr dfgui 0,139
lge f = 0 to 3
vghjtres xsderthk fr(klb+1,kl,(4*f)+1),fr(klb+1,kl,(4*f)+2),fr(klb+1,kl,(4*f)+3),fr(klb+1,kl,(4*f)+4),1
zdrt
lge lo = 1 to 100000 : zdrt
zaqwsx